home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 49
/
Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso
/
-websites-
/
wirenet
/
files
/
wirenet151.lzx
/
Updates
/
StartNet
< prev
next >
Wrap
Text File
|
1999-11-06
|
1KB
|
50 lines
; $VER: StartNet 1.51 (30.10.96)
; Starts up AmiTCP or Miami and sets everything up ready to connect to Internet
If $NetState EQ "NoNet"
If exists "ENV:Wirenet/UseMiami"
;Start Miami
Run >NIL: AmiTCP:Miami
Wait 3
WaitForPort MIAMI.1
Else
; Start AmiTCP
Assign APIPE: Exists > NIL:
IF Warn
Mount APIPE: from AmiTCP:devs/APipe-Mountlist
EndIf
; log in
AmiTCP:bin/login -f $USERNAME
AmiTCP:bin/umask 022
; start AmiTCP
AmiTCP:AmiTCP
WaitForPort AMITCP
; Configure loop-back device
AmiTCP:bin/ifconfig lo0 localhost
If $IPADDRESS NOT EQ "0.0.0.0"
; Add IP address entry for this host
rx "address AMITCP; 'ADD HOST $IPAddress $HostName'"
; Add route to this host
AmiTCP:bin/route add $IPAddress localhost
EndIf
Assign TCP: Exists > NIL:
IF Warn
Mount TCP: from AmiTCP:devs/Inet-Mountlist
EndIf
; Start the internet `super server'
run >NIL: AmiTCP:bin/inetd
EndIf
SetEnv NetState Offline
If Exists AmiTCP:db/User-Startnet
AmiTCP:db/User-Startnet
EndIf
EndIf